Imports Microsoft.VisualBasic

Public Class Requisicion
    Private _id As Integer
    Private _prioridad As String
    Private _unidad As String
    Private _precioUnitario As Double
    Private _cantidad As Integer
    Private _um As String
    Private _descripcion As String
    Private _refProveedor As Proveedor
    Private _arrayItem As ArrayList

    Public Sub New(ByVal id As Integer, ByVal prioridad As String, ByVal unidad As String, ByVal precioUnitario As Double, ByVal cantidad As Integer, _
                    ByVal um As String, ByVal descripcion As String)
        Me._id = id
        Me._prioridad = prioridad
        Me._unidad = unidad
        Me._precioUnitario = precioUnitario
        Me._cantidad = cantidad
        Me._um = um
        Me._descripcion = descripcion
    End Sub

    Public Property Id() As Integer
        Get
            Return _id
        End Get

        Set(ByVal value As Integer)
            _id = value
        End Set
    End Property

    Public Property Prioridad() As String
        Get
            Return _prioridad
        End Get

        Set(ByVal value As String)
            _prioridad = value
        End Set
    End Property

    Public Property Unidad() As String
        Get
            Return _unidad
        End Get

        Set(ByVal value As String)
            _unidad = value
        End Set
    End Property

    Public Property PrecioUnitario() As Double
        Get
            Return _precioUnitario
        End Get

        Set(ByVal value As Double)
            _precioUnitario = value
        End Set
    End Property

    Public Property Cantidad() As Integer
        Get
            Return _cantidad
        End Get

        Set(ByVal value As Integer)
            _cantidad = value
        End Set
    End Property

    Public Property Um() As String
        Get
            Return _um
        End Get

        Set(ByVal value As String)
            _um = value
        End Set
    End Property


    Public Property Descripcion() As String
        Get
            Return _descripcion
        End Get

        Set(ByVal value As String)
            _descripcion = value
        End Set
    End Property

    Public Property ArrayItem() As ArrayList
        Get
            Return _arrayItem
        End Get

        Set(ByVal value As ArrayList)
            _arrayItem = value
        End Set
    End Property

    Public Property RefProveedor() As Proveedor
        Get
            Return _refProveedor
        End Get

        Set(ByVal value As Proveedor)
            _refProveedor = value
        End Set
    End Property



End Class
